(lookup_char_property): Do not prematurely return nil.
authorLuc Teirlinck <teirllm@auburn.edu>
Thu, 20 May 2004 17:29:57 +0000 (17:29 +0000)
committerLuc Teirlinck <teirllm@auburn.edu>
Thu, 20 May 2004 17:29:57 +0000 (17:29 +0000)
src/intervals.c

index d3f814d60cecbe0faa32983dce147fed78219603..33ef9a3417740701322f05f05cedfd3205604535 100644 (file)
@@ -1899,11 +1899,13 @@ lookup_char_property (plist, prop, textprop)
     return fallback;
   /* Check for alternative properties */
   tail = Fassq (prop, Vchar_property_alias_alist);
-  if (NILP (tail))
-    return tail;
-  tail = XCDR (tail);
-  for (; NILP (fallback) && CONSP (tail); tail = XCDR (tail))
-    fallback = Fplist_get (plist, XCAR (tail));
+  if (! NILP (tail))
+    {
+      tail = XCDR (tail);
+      for (; NILP (fallback) && CONSP (tail); tail = XCDR (tail))
+       fallback = Fplist_get (plist, XCAR (tail));
+    }
+
   if (textprop && NILP (fallback) && CONSP (Vdefault_text_properties))
     fallback = Fplist_get (Vdefault_text_properties, prop);
   return fallback;